<%

Function torneio_encerrar_torneio(conexao, id_torneio)

		str = "Select id FROM torneios_grupos where status<2 and id_torneio="&id_torneio
		Set rs = conexao.Execute(str)	
		
		if rs.eof then
		
			DIM id_campeao, id_vice, id_artilheiro
		
			torneio_editar conexao, id_torneio, "status", 2
			torneio_campeao conexao, id_torneio, id_campeao, id_vice, id_artilheiro
			torneio_editar conexao, id_torneio, "campeao", id_campeao
			torneio_editar conexao, id_torneio, "vice", id_vice
			torneio_editar conexao, id_torneio, "artilheiro",id_artilheiro	
		
		
		End If


End Function

%>